home *** CD-ROM | disk | FTP | other *** search
/ Network CD 2 / Network CD - Volume 2.iso / programs / archives / ncomm30.lha / NComm / Scripts / clock.script next >
Encoding:
Text File  |  1993-04-24  |  275 b   |  12 lines
  1. ;NComm script that demonstrates the STRPART function
  2.  
  3. SET $stoptime = "14:00:00"
  4.  
  5. REPEAT
  6.     SET $varin = $date
  7.     STRPART $varout "11" "8" $varin    ;Numbers without quotes are also OK
  8.     MESSAGE $varout"\r"
  9.     DELAY 1
  10. UNTIL $varout == $stoptime
  11. MESSAGE "\t --- Reached StopTime\n";
  12.